#Deep Q Network for ENO
#Resetting the battery to BOPT on each day during training
#Increase no. of actions to 10

%matplotlib inline

import pulp
import matplotlib.pyplot as plt
from matplotlib.colors import ListedColormap

import pandas as pd
import numpy as np
from random import shuffle
from mpl_toolkits.mplot3d import Axes3D

import torch
import torch.nn as nn
import torch.nn.functional as F

np.random.seed(230228)

# Hyper Parameters
BATCH_SIZE = 24
LR = 0.01                   # learning rate
EPSILON = 0.9               # greedy policy
GAMMA = 0.9                 # reward discount
LAMBDA = 0.8                # parameter decay
TARGET_REPLACE_ITER = 24*7*4*2    # target update frequency (every month)
MEMORY_CAPACITY = 24*7*4*6      # store upto four month worth of memory   

N_ACTIONS = 10 #no. of duty cycles (0,1,2,3,4)
N_STATES = 4 #number of state space parameter [batt, enp, henergy, fcast]
HIDDEN_LAYER = 30

class ENO(object):
    def __init__(self, year=2010):
        self.year = year
        self.day = None
        self.hr = None
        
        self.TIME_STEPS = None
        self.NO_OF_DAYS = None
        
        self.BMIN = 0.0
        self.BMAX = 20000.0 #Battery capacity
        self.BOPT = 0.6 * self.BMAX #Assuming 60% of battery is the optimal level
        self.HMAX = 1000
        
        self.senergy = None #matrix with harvested energy data for the entire year
        self.fforecast = None #matrix with forecast values for each day
        
        self.batt = None #battery variable
        self.enp = None #enp at end of hr
        self.henergy = None #harvested energy variable
        self.fcast = None #forecast variable
    
    #function to map total day energy into day_state
    def get_day_state(self,tot_day_energy):
        if (tot_day_energy < 2500):
            day_state = 0
        elif (2500 <= tot_day_energy < 5000):
            day_state = 1
        elif (5000 <= tot_day_energy < 8000):
            day_state = 2
        elif (8000 <= tot_day_energy < 10000):
            day_state = 3
        elif (10000 <= tot_day_energy < 12000):
            day_state = 4
        else:
            day_state = 5
        return int(day_state)

    #function to get the solar data for the given year and prep it
    def get_data(self):
        filename = str(self.year)+'.csv'
        #skiprows=4 to remove unnecessary title texts
        #usecols=4 to read only the Global Solar Radiation (GSR) values
        solar_radiation = pd.read_csv(filename, skiprows=4, encoding='shift_jisx0213', usecols=[4])
        
        #convert dataframe to numpy array
        solar_radiation = solar_radiation.values
        solar_energy = np.array([i *0.0165*1000000*0.15*1000/(60*60) for i in solar_radiation])
        
        #reshape solar_energy into no_of_daysx24 array
        _senergy = solar_energy.reshape(-1,24)
        _senergy[np.isnan(_senergy)] = 0 #convert missing data in CSV files to zero
        self.senergy = _senergy
        
        
        #create a perfect forecaster
        tot_day_energy = np.sum(_senergy, axis=1) #contains total energy harvested on each day
        get_day_state = np.vectorize(self.get_day_state)
        self.fforecast = get_day_state(tot_day_energy)
        
        return 0
    
    def reset(self):
        
        self.get_data() #first get data for the given year
        
        self.TIME_STEPS = self.senergy.shape[1]
        self.NO_OF_DAYS = self.senergy.shape[0]
        
        print("Environment is RESET")
        
        self.day = 0
        self.hr = 0
        
        self.batt = self.BOPT #battery returns to optimal level
        self.enp = self.BOPT - self.batt #enp is reset to zero
        self.henergy = self.senergy[self.day][self.hr] 
        self.fcast = self.fforecast[self.day]
        
        state = [self.batt/self.BMAX, self.enp/(self.BMAX/2), self.henergy/self.HMAX, self.fcast/5] #normalizing all state values within [0,1] interval
        reward = 0
        done = False
        info = "RESET"
        return [state, reward, done, info]
    
    
    #reward function
    def rewardfn(self):
        mu = 0
        sig = 1000
#         return ((1./(np.sqrt(2.*np.pi)*sig)*np.exp(-np.power((self.enp - mu)/sig, 2.)/2)) * 2000000)-400


        if(np.abs(self.enp) <= 2400): #24hr * 100mW/hr
            return ((1./(np.sqrt(2.*np.pi)*sig)*np.exp(-np.power((self.enp - mu)/sig, 2.)/2)) * 1000000)
        else:
            return -100 - 0.05*np.abs(self.enp)
    
    def step(self, action):
        done = False
        info = "OK"
#         print("Next STEP")
        
        reward = 0
        e_consumed = (action+1)*50
        
        self.batt += (self.henergy - e_consumed)
        self.batt = np.clip(self.batt, self.BMIN, self.BMAX)
        self.enp = self.BOPT - self.batt
        
        if(self.hr < self.TIME_STEPS - 1):
            self.hr += 1
            self.henergy = self.senergy[self.day][self.hr] 
        else:
            if(self.day < self.NO_OF_DAYS -1):
                reward = self.rewardfn() #give reward only at the end of the day
                self.hr = 0
                self.day += 1
                self.henergy = self.senergy[self.day][self.hr] 
                self.fcast = self.fforecast[self.day]
            else:
                reward = self.rewardfn()
                done = True
                info = "End of the year"
                
        _state = [self.batt/self.BMAX, self.enp/(self.BMAX/2), self.henergy/self.HMAX, self.fcast/5]
        return [_state, reward, done, info]

class Net(nn.Module):
    def __init__(self, ):
        super(Net, self).__init__()
        self.fc1 = nn.Linear(N_STATES, HIDDEN_LAYER)
        self.fc1.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc2 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc2.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc3 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc3.weight.data.normal_(0, 0.1)   # initialization
        
        self.fc4 = nn.Linear(HIDDEN_LAYER, HIDDEN_LAYER)
        self.fc4.weight.data.normal_(0, 0.1)   # initialization
        
        self.out = nn.Linear(HIDDEN_LAYER, N_ACTIONS)
        self.out.weight.data.normal_(0, 0.1)   # initialization

    def forward(self, x):
        x = self.fc1(x)
        x = F.relu(x)
        actions_value = self.out(x)
        return actions_value

class DQN(object):
    def __init__(self):
        self.eval_net, self.target_net = Net(), Net()
        print("Neural net")
        print(self.eval_net)

        self.learn_step_counter = 0                                     # for target updating
        self.memory_counter = 0                                         # for storing memory
        self.memory = np.zeros((MEMORY_CAPACITY, N_STATES * 2 + 2))     # initialize memory [mem: ([s], a, r, [s_]) ]
        self.optimizer = torch.optim.Adam(self.eval_net.parameters(), lr=LR)
        self.loss_func = nn.MSELoss()

    def choose_action(self, x):
        x = torch.unsqueeze(torch.FloatTensor(x), 0)
        # input only one sample
        if np.random.uniform() < EPSILON:   # greedy
            actions_value = self.eval_net.forward(x)
            action = torch.max(actions_value, 1)[1].data.numpy()
            action = action[0] # return the argmax index
        else:   # random
            action = np.random.randint(0, N_ACTIONS)
            action = action
        return action
    
    def choose_greedy_action(self, x):
        x = torch.unsqueeze(torch.FloatTensor(x), 0)
        # input only one sample
    
        actions_value = self.eval_net.forward(x)
        action = torch.max(actions_value, 1)[1].data.numpy()
        action = action[0] # return the argmax index

        return action

    def store_transition(self, s, a, r, s_):
        transition = np.hstack((s, [a, r], s_))
        # replace the old memory with new memory
        index = self.memory_counter % MEMORY_CAPACITY
        self.memory[index, :] = transition
        self.memory_counter += 1

    def learn(self):
        # target parameter update
        if self.learn_step_counter % TARGET_REPLACE_ITER == 0:
            self.target_net.load_state_dict(self.eval_net.state_dict())
        self.learn_step_counter += 1

        # sample batch transitions
        sample_index = np.random.choice(MEMORY_CAPACITY, BATCH_SIZE)
        b_memory = self.memory[sample_index, :]
        b_s = torch.FloatTensor(b_memory[:, :N_STATES])
        b_a = torch.LongTensor(b_memory[:, N_STATES:N_STATES+1].astype(int))
        b_r = torch.FloatTensor(b_memory[:, N_STATES+1:N_STATES+2])
        b_s_ = torch.FloatTensor(b_memory[:, -N_STATES:])

        # q_eval w.r.t the action in experience
        q_eval = self.eval_net(b_s).gather(1, b_a)  # shape (batch, 1)
        q_next = self.target_net(b_s_).detach()     # detach from graph, don't backpropagate
        q_target = b_r + GAMMA * q_next.max(1)[0].view(BATCH_SIZE, 1)   # shape (batch, 1)
        loss = self.loss_func(q_eval, q_target)

        self.optimizer.zero_grad()
        loss.backward()
        self.optimizer.step()

dqn = DQN()
eno = ENO(2010)
NO_OF_ITERATIONS = 100
avg_reward_rec = np.empty(1)
for iteration in range(NO_OF_ITERATIONS):
    print('\nCollecting experience... Iteration:', iteration)
    s, r, done, info = eno.reset()
    record = np.empty(4)

    while True:
    #     print([eno.day, eno.hr])

        a = dqn.choose_action(s)
    #     print("Actin is ",a)
        #state = [batt, enp, henergy, fcast]
        record = np.vstack((record, [s[0],s[2],r, a])) #record battery, henergy, reward and action
    #     print("Action is" , a)
        # take action
        s_, r, done, info = eno.step(a)
    #     print([s_,r])
    #     print("\n")
#         if eno.hr == 0:
#             eno.batt = eno.BOPT #resetting the battery to the optimal value for each day
        dqn.store_transition(s, a, r, s_)

        if dqn.memory_counter > MEMORY_CAPACITY:
            dqn.learn()

        if done:
            print("End of Data")
            break

        s = s_

    record = np.delete(record, 0, 0) #remove the first row which is garbage

    reward_rec = record[:,2]
    reward_rec = reward_rec[reward_rec != 0]
    print("Average reward =", np.mean(reward_rec) )
    avg_reward_rec = np.append(avg_reward_rec, np.mean(reward_rec))

    action_rec = record[:,3]

    fig = plt.figure(figsize=(10,5))

    ax1 = fig.add_subplot(1,2,1)
    ax1.plot(reward_rec,'y')
    plt.ylabel("REWARD")
    plt.xlabel("Day")
    ax1.set_ylim([-400,400])

    ax2 = fig.add_subplot(1,2,2)
    plt.hist(action_rec, rwidth=0.75)#     plt.ylabel("Action")

    fig.tight_layout()
    plt.show()

avg_reward_rec = np.delete(avg_reward_rec, 0, 0) #remove the first row which is garbage
plt.plot(avg_reward_rec,'b')

Neural net
Net(
  (fc1): Linear(in_features=4, out_features=30, bias=True)
  (fc2): Linear(in_features=30, out_features=30, bias=True)
  (fc3): Linear(in_features=30, out_features=30, bias=True)
  (fc4): Linear(in_features=30, out_features=30, bias=True)
  (out): Linear(in_features=30, out_features=10, bias=True)
)

Collecting experience... Iteration: 0
Environment is RESET
End of Data
Average reward = -352.6198632124584

Collecting experience... Iteration: 1
Environment is RESET
End of Data
Average reward = -289.9086989266398

Collecting experience... Iteration: 2
Environment is RESET
End of Data
Average reward = -236.9097483350258

Collecting experience... Iteration: 3
Environment is RESET
End of Data
Average reward = -226.80436895340543

Collecting experience... Iteration: 4
Environment is RESET
End of Data
Average reward = -225.57812447293242

Collecting experience... Iteration: 5
Environment is RESET
End of Data
Average reward = -285.6742204340982

Collecting experience... Iteration: 6
Environment is RESET
End of Data
Average reward = -226.58023483850212

Collecting experience... Iteration: 7
Environment is RESET
End of Data
Average reward = -178.6727786832705

Collecting experience... Iteration: 8
Environment is RESET
End of Data
Average reward = -214.38337914268817

Collecting experience... Iteration: 9
Environment is RESET
End of Data
Average reward = -161.2508871415344

Collecting experience... Iteration: 10
Environment is RESET
End of Data
Average reward = -119.46301004630224

Collecting experience... Iteration: 11
Environment is RESET
End of Data
Average reward = -242.88794096318

Collecting experience... Iteration: 12
Environment is RESET
End of Data
Average reward = -147.52419964407326

Collecting experience... Iteration: 13
Environment is RESET
End of Data
Average reward = -144.77049775239482

Collecting experience... Iteration: 14
Environment is RESET
End of Data
Average reward = -193.6748817130279

Collecting experience... Iteration: 15
Environment is RESET
End of Data
Average reward = -194.85082180969818

Collecting experience... Iteration: 16
Environment is RESET
End of Data
Average reward = -196.2072163767127

Collecting experience... Iteration: 17
Environment is RESET
End of Data
Average reward = -168.80858301336806

Collecting experience... Iteration: 18
Environment is RESET
End of Data
Average reward = -159.585692857263

Collecting experience... Iteration: 19
Environment is RESET
End of Data
Average reward = -169.73114483800808

Collecting experience... Iteration: 20
Environment is RESET
End of Data
Average reward = -94.90666767600027

Collecting experience... Iteration: 21
Environment is RESET
End of Data
Average reward = -89.45430757606675

Collecting experience... Iteration: 22
Environment is RESET
End of Data
Average reward = -93.63398194146957

Collecting experience... Iteration: 23
Environment is RESET
End of Data
Average reward = -83.89461681594568

Collecting experience... Iteration: 24
Environment is RESET
End of Data
Average reward = -99.47237169145691

Collecting experience... Iteration: 25
Environment is RESET
End of Data
Average reward = -116.31235589334017

Collecting experience... Iteration: 26
Environment is RESET
End of Data
Average reward = -210.44267303248736

Collecting experience... Iteration: 27
Environment is RESET
End of Data
Average reward = -289.736578803093

Collecting experience... Iteration: 28
Environment is RESET
End of Data
Average reward = -221.47579053598284

Collecting experience... Iteration: 29
Environment is RESET
End of Data
Average reward = -164.2193328188362

Collecting experience... Iteration: 30
Environment is RESET
End of Data
Average reward = -195.3407239642891

Collecting experience... Iteration: 31
Environment is RESET
End of Data
Average reward = -124.32128004750997

Collecting experience... Iteration: 32
Environment is RESET
End of Data
Average reward = -129.44243466011147

Collecting experience... Iteration: 33
Environment is RESET
End of Data
Average reward = -99.35167125182267

Collecting experience... Iteration: 34
Environment is RESET
End of Data
Average reward = -46.71411849688205

Collecting experience... Iteration: 35
Environment is RESET
End of Data
Average reward = -101.99725333229547

Collecting experience... Iteration: 36
Environment is RESET
End of Data
Average reward = -118.2122569637579

Collecting experience... Iteration: 37
Environment is RESET
End of Data
Average reward = -145.6201431460048

Collecting experience... Iteration: 38
Environment is RESET
End of Data
Average reward = -151.33030060723877

Collecting experience... Iteration: 39
Environment is RESET
End of Data
Average reward = -134.4780487672918

Collecting experience... Iteration: 40
Environment is RESET
End of Data
Average reward = -128.6382329703518

Collecting experience... Iteration: 41
Environment is RESET
End of Data
Average reward = -128.05277923794367

Collecting experience... Iteration: 42
Environment is RESET
End of Data
Average reward = -145.79012572658021

Collecting experience... Iteration: 43
Environment is RESET
End of Data
Average reward = -193.91319033785715

Collecting experience... Iteration: 44
Environment is RESET
End of Data
Average reward = -248.38737553462613

Collecting experience... Iteration: 45
Environment is RESET
End of Data
Average reward = -146.17576753184363

Collecting experience... Iteration: 46
Environment is RESET
End of Data
Average reward = -224.6015646686926

Collecting experience... Iteration: 47
Environment is RESET
End of Data
Average reward = -183.47802899066548

Collecting experience... Iteration: 48
Environment is RESET
End of Data
Average reward = -245.54631257069218

Collecting experience... Iteration: 49
Environment is RESET
End of Data
Average reward = -248.64327687955176

Collecting experience... Iteration: 50
Environment is RESET
End of Data
Average reward = -283.61554447044824

Collecting experience... Iteration: 51
Environment is RESET
End of Data
Average reward = -288.552079613093

Collecting experience... Iteration: 52
Environment is RESET
End of Data
Average reward = -217.84908328266098

Collecting experience... Iteration: 53
Environment is RESET
End of Data
Average reward = -227.61042735009494

Collecting experience... Iteration: 54
Environment is RESET
End of Data
Average reward = -320.49172460737935

Collecting experience... Iteration: 55
Environment is RESET
End of Data
Average reward = -186.62729863944227

Collecting experience... Iteration: 56
Environment is RESET
End of Data
Average reward = -259.48979594603634

Collecting experience... Iteration: 57
Environment is RESET
End of Data
Average reward = -273.2533879475651

Collecting experience... Iteration: 58
Environment is RESET
End of Data
Average reward = -277.03147693630757

Collecting experience... Iteration: 59
Environment is RESET
End of Data
Average reward = -204.9348244243813

Collecting experience... Iteration: 60
Environment is RESET
End of Data
Average reward = -166.3178357741526

Collecting experience... Iteration: 61
Environment is RESET
End of Data
Average reward = -311.32775099284373

Collecting experience... Iteration: 62
Environment is RESET
End of Data
Average reward = -287.02074921822583

Collecting experience... Iteration: 63
Environment is RESET
End of Data
Average reward = -223.9881974563546

Collecting experience... Iteration: 64
Environment is RESET
End of Data
Average reward = -328.78774908795447

Collecting experience... Iteration: 65
Environment is RESET
End of Data
Average reward = -228.2193516874335

Collecting experience... Iteration: 66
Environment is RESET
End of Data
Average reward = -199.82955978912275

Collecting experience... Iteration: 67
Environment is RESET
End of Data
Average reward = -260.8406560357563

Collecting experience... Iteration: 68
Environment is RESET
End of Data
Average reward = -232.32675268960253

Collecting experience... Iteration: 69
Environment is RESET
End of Data
Average reward = -311.94766750321327

Collecting experience... Iteration: 70
Environment is RESET
End of Data
Average reward = -235.1518315357716

Collecting experience... Iteration: 71
Environment is RESET
End of Data
Average reward = -313.7977856005617

Collecting experience... Iteration: 72
Environment is RESET
End of Data
Average reward = -365.6860700381544

Collecting experience... Iteration: 73
Environment is RESET
End of Data
Average reward = -309.8191903984853

Collecting experience... Iteration: 74
Environment is RESET
End of Data
Average reward = -313.3724220044617

Collecting experience... Iteration: 75
Environment is RESET
End of Data
Average reward = -259.3570426142065

Collecting experience... Iteration: 76
Environment is RESET
End of Data
Average reward = -267.2018138195704

Collecting experience... Iteration: 77
Environment is RESET
End of Data
Average reward = -203.31908542537263

Collecting experience... Iteration: 78
Environment is RESET
End of Data
Average reward = -252.28963899081737

Collecting experience... Iteration: 79
Environment is RESET
End of Data
Average reward = -240.55040285947197

Collecting experience... Iteration: 80
Environment is RESET
End of Data
Average reward = -290.0608018682123

Collecting experience... Iteration: 81
Environment is RESET
End of Data
Average reward = -325.914991549357

Collecting experience... Iteration: 82
Environment is RESET
End of Data
Average reward = -188.37857127248907

Collecting experience... Iteration: 83
Environment is RESET
End of Data
Average reward = -284.5722462935833

Collecting experience... Iteration: 84
Environment is RESET
End of Data
Average reward = -292.0538038630639

Collecting experience... Iteration: 85
Environment is RESET
End of Data
Average reward = -229.1781103097466

Collecting experience... Iteration: 86
Environment is RESET
End of Data
Average reward = -331.62607016743874

Collecting experience... Iteration: 87
Environment is RESET
End of Data
Average reward = -394.25824994309374

Collecting experience... Iteration: 88
Environment is RESET
End of Data
Average reward = -299.3154676872676

Collecting experience... Iteration: 89
Environment is RESET
End of Data
Average reward = -239.50748003143164

Collecting experience... Iteration: 90
Environment is RESET
End of Data
Average reward = -223.1259501299966

Collecting experience... Iteration: 91
Environment is RESET
End of Data
Average reward = -267.97914984752754

Collecting experience... Iteration: 92
Environment is RESET
End of Data
Average reward = -358.7594089302194

Collecting experience... Iteration: 93
Environment is RESET
End of Data
Average reward = -365.6500961365006

Collecting experience... Iteration: 94
Environment is RESET
End of Data
Average reward = -319.28250833648246

Collecting experience... Iteration: 95
Environment is RESET
End of Data
Average reward = -288.5694703817068

Collecting experience... Iteration: 96
Environment is RESET
End of Data
Average reward = -209.37643094774532

Collecting experience... Iteration: 97
Environment is RESET
End of Data
Average reward = -246.59860493879114

Collecting experience... Iteration: 98
Environment is RESET
End of Data
Average reward = -211.66176663685826

Collecting experience... Iteration: 99
Environment is RESET
End of Data
Average reward = -230.68992294195107

[<matplotlib.lines.Line2D at 0x7f0ddbcdf4e0>]

print('\nTesting...')
s, r, done, info = eno.reset()
test_record = np.empty(4)

while True:
#     print([eno.day, eno.hr])

    a = dqn.choose_greedy_action(s)
    
    #state = [batt, enp, henergy, fcast]
    test_record = np.vstack((test_record, [s[0],s[2],r, a])) #record battery, henergy, reward and action
#     print("Action is" , a)
    # take action
    s_, r, done, info = eno.step(a)
#     print([s_,r])
#     print("\n")
#     if eno.hr == 0:
#         eno.batt = eno.BOPT #resetting the battery to the optimal value for each day
   
    if done:
        print("End of Data")
        break
       
    s = s_

Testing...
Environment is RESET
End of Data

test_reward_rec = test_record[:,2]
test_reward_rec = test_reward_rec[test_reward_rec != 0]
plt.plot(test_reward_rec)

[<matplotlib.lines.Line2D at 0x7f0ddbc22128>]

plt.plot(test_record[:,0],'r')

[<matplotlib.lines.Line2D at 0x7f0ddb729828>]

#Average Battery Percentage
np.mean(test_record[:,0])

0.729150789008104

for DAY in range(eno.NO_OF_DAYS):
    START = DAY*24
    END = START+24

    fig = plt.figure(figsize=(10,4))
    st = fig.suptitle("DAY %s" %(DAY))

    ax1 = fig.add_subplot(141)
    ax1.plot(test_record[START:END,0])
    ax1.set_title("Battery")
    ax1.set_ylim([0,1])

    ax2 = fig.add_subplot(142)
    ax2.plot(test_record[START:END,1])
    ax2.set_title("Harvested Energy")
    ax2.set_ylim([0,1])

    ax3 = fig.add_subplot(144)
    ax3.axis('off')
    if END < (eno.NO_OF_DAYS*eno.TIME_STEPS):
        plt.text(0.5, 0.5, "REWARD = %.2f\n" %(test_record[END+1,2]),fontsize=14, ha='center')

    ax4 = fig.add_subplot(143)
    ax4.plot(test_record[START:END,3])
    ax4.set_title("Action")
    ax4.set_ylim([0,N_ACTIONS])

    fig.tight_layout()
    st.set_y(0.95)
    fig.subplots_adjust(top=0.75)
    plt.show()